From: Andreas Schwab <schwab@suse.de>
Date: Mon, 26 Jan 2004 11:54:25 +0000 (+0000)
Subject: (Fpurecopy): Declare size as EMACS_INT to not lose bits.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~24371
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=baf61ee6fecfeb8df4d017c36eb3051012295653;p=emacs.git

(Fpurecopy): Declare size as EMACS_INT to not lose bits.
---

diff --git a/src/alloc.c b/src/alloc.c
index f69ad5f870e..7be54aa1ae0 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -4230,12 +4230,13 @@ Does not copy symbols.  Copies strings without text properties.  */)
   else if (COMPILEDP (obj) || VECTORP (obj))
     {
       register struct Lisp_Vector *vec;
-      register int i, size;
+      register int i;
+      EMACS_INT size;
 
       size = XVECTOR (obj)->size;
       if (size & PSEUDOVECTOR_FLAG)
 	size &= PSEUDOVECTOR_SIZE_MASK;
-      vec = XVECTOR (make_pure_vector ((EMACS_INT) size));
+      vec = XVECTOR (make_pure_vector (size));
       for (i = 0; i < size; i++)
 	vec->contents[i] = Fpurecopy (XVECTOR (obj)->contents[i]);
       if (COMPILEDP (obj))